home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1999 #2 / Amiga Plus CD - 1999 - No. 2.iso / Anwender / Office / MakeCD_3.2a / Tracks / registerscript < prev   
AmigaDOS Script File  |  1998-08-12  |  7KB  |  196 lines

  1. .KEY language/A
  2. .BRA {
  3. .KET }
  4.  
  5. ; $Id: registerscript 1.7 1998/08/13 08:25:05 angela Exp $
  6.  
  7. ; If you want to add support for further languages, please
  8. ; contact angela@core.de first to check if somebody else is already
  9. ; working on such a translation.
  10.  
  11. SET makecdlang {language}
  12.  
  13. ; By Angela Schmidt
  14. ; *** This is the filename under which the registration form is saved
  15. SET makecdregfilename "Registrationform"
  16. SET makecdnoregform "Sorry, could not find registration form for MakeCD."
  17. SET makecdregreq "Registration Request"
  18. SET makecdshallprint "Do you want the registration form being printed now?"
  19. SET makecdshalldelete "Do you want the registration form in T: being deleted now?"
  20. SET makecdansok "OK"
  21. SET makecdansyes "Yes"
  22. SET makecdansno "No"
  23.  
  24. ; by Angela Schmidt
  25. IF $makecdlang EQ "deutsch"
  26.   SET makecdregfilename "Registrierformular"
  27.   SET makecdnoregform "Leider konnte kein Registrierformular für MakeCD gefunden werden."
  28.   SET makecdregreq "Registrations-Dialogfenster"
  29.   SET makecdshallprint "Soll das Registrierformular nun gedruckt werden?"
  30.   SET makecdshalldelete "Soll das Registrierformular nun aus T: gelöscht werden?"
  31.   SET makecdansok "OK"
  32.   SET makecdansyes "Ja"
  33.   SET makecdansno "Nein"
  34. ENDIF
  35.  
  36. ; By Mark Holm <mholm@email.dk>
  37. IF $makecdlang EQ "dansk"
  38.   SET makecdregfilename "Registreringsformular"
  39.   SET makecdnoregform "Beklager, kan ikke finde MakeCD's registreringsformular."
  40.   SET makecdregreq "Registreringsforespørgsel"
  41.   SET makecdshallprint "Vil du udskrive registreringsformularen nu?"
  42.   SET makecdshalldelete "Vil du slette registreringsformularen i T: nu?"
  43.   SET makecdansok "OK"
  44.   SET makecdansyes "Ja"
  45.   SET makecdansno "Nej"
  46. ENDIF
  47.  
  48. ; By Javier Morata <jmorata@kaos.es>
  49. IF $makecdlang EQ "español"
  50. SET makecdregfilename "Formulario_de_registro"
  51. SET makecdnoregform "Lo siento, no he podido encontrar el formulario de registro para MakeCD."
  52. SET makecdregreq "Pedido de Registro"
  53. SET makecdshallprint "Quieres que el formulario de registro sea imprimido ahora ?"
  54. SET makecdshalldelete "Quieres que el formulario de registro en T: sea borrado ahora ?"
  55. SET makecdansok "OK"
  56. SET makecdansyes "Si"
  57. SET makecdansno "No"
  58. ENDIF
  59.  
  60. ; By Jean-Marc Boursot <jmboursot@nucleus.fr>
  61. IF $makecdlang EQ "français"
  62.   SET makecdregfilename "FormEnregistrement"
  63.   SET makecdnoregform "Désolé, impossible de trouver le formulaire d'enregistrement pour MakeCD."
  64.   SET makecdregreq "Requête d'enregistrement"
  65.   SET makecdshallprint "Voulez-vous que la fiche d'enregistrement soit imprimée maintenant ?"
  66.   SET makecdshalldelete "Voulez-vous que la fiche d'enregistrement dans T: soit effacée maintenant ?"
  67.   SET makecdansok "OK"
  68.   SET makecdansyes "Oui"
  69.   SET makecdansno "Non"
  70. ENDIF
  71.  
  72. ; By Francesco Dipietromaria <dpm@sinet.it>
  73. IF $makecdlang EQ "italiano"
  74.   SET makecdregfilename "Moduloregistrazione"
  75.   SET makecdnoregform "Spiacente, non trovo il modulo di registrazione per MakeCD."
  76.   SET makecdregreq "Registrazione"
  77.   SET makecdshallprint "Volete stampare il modulo di registrazione adesso?"
  78.   SET makecdshalldelete "Volete cheil modulo di registrazione venga cancellato da T: adesso?"
  79.   SET makecdansok "OK"
  80.   SET makecdansyes "Si"
  81.   SET makecdansno "No"
  82. ENDIF
  83.  
  84. ; By Horváth Péter <pcpince@syneco.hu>
  85. IF $makecdlang EQ "magyar"
  86.   SET makecdregfilename "Regisztrációs ûrlap"
  87.   SET makecdnoregform "Sajnos nem találom a MakeCD regisztrációs ûrlapját."
  88.   SET makecdregreq "Regisztrációs kérés"
  89.   SET makecdshallprint "Kívánja a regisztrációs ûrapot most kinyomtatni?"
  90.   SET makecdshalldelete "Kívánja a T:-ben lévõ regisztrációs ûrlapot most letörölni?"
  91.   SET makecdansok "OK"
  92.   SET makecdansyes "Igen"
  93.   SET makecdansno "Nem"
  94. ENDIF
  95.  
  96. ; By Wessel Dankers <wsldanke@cs.ruu.nl>
  97. IF $makecdlang EQ "nederlands"
  98.   SET makecdregfilename "Registratieformulier"
  99.   SET makecdnoregform "Sorry, kon registratieformulier niet vinden voor MakeCD"
  100.   SET makecdregreq "Verzoek tot registratie"
  101.   SET makecdshallprint "Zal ik het registratieformulier nu printen?"
  102.   SET makecdshalldelete "Zal ik het registratieformulier in T: nu wissen?"
  103.   SET makecdansok "Ok"
  104.   SET makecdansyes "Ja"
  105.   SET makecdansno "Nee"
  106. ENDIF
  107.  
  108. ; By Eivind Olsen <eivindo@bgnett.no>
  109. IF $makecdlang EQ "norsk"
  110.   SET makecdregfilename "Registrerings-skjema"
  111.   SET makecdnoregform "Beklager, kunne ikke finne registrerings-skjemaet for MakeCD."
  112.   SET makecdregreq "Registrerings-forespørsel"
  113.   SET makecdshallprint "Vil du skrive ut registrerings-skjemaet nå?"
  114.   SET makecdshalldelete "Vil du slette registrerings-skjemaet som ligger i T:?"
  115.   SET makecdansok "OK"
  116.   SET makecdansyes "Ja"
  117.   SET makecdansno "Nei"
  118. ENDIF
  119.  
  120. ; By Mikko Virtanen <mtv@klinja.fipnet.fi>
  121. IF $makecdlang EQ "suomi"
  122.   SET makecdregfilename "Rekisteröintikaavake"
  123.   SET makecdnoregform "En löytänyt rekisteröintikaavaketta MakeCD:lle."
  124.   SET makecdregreq "Rekisteröintipyyntö"
  125.   SET makecdshallprint "Haluatko, että rekisteröintikaavake tulostetaan nyt?"
  126.   SET makecdshalldelete "Haluatko, että T:ssä oleva rekisteröintikaavake tuhotaan nyt?"
  127.   SET makecdansok "OK"
  128.   SET makecdansyes "Kyllä"
  129.   SET makecdansno "Ei"
  130. ENDIF
  131.  
  132. ; By Fredrik Zetterlund <frallan@canit.se>
  133. IF $makecdlang EQ "svenska"
  134.   SET makecdregfilename "Registreringsformulär"
  135.   SET makecdnoregform "Hittar inte registreringsformuläret för MakeCD."
  136.   SET makecdregreq "Registreringsförfrågan"
  137.   SET makecdshallprint "Vill du skriva ut registreringsformuläret nu?"
  138.   SET makecdshalldelete "Vill du radera registreringsformuläret i T: nu?"
  139.   SET makecdansok "Okej"
  140.   SET makecdansyes "Ja"
  141.   SET makecdansno "Nej"
  142. ENDIF
  143.  
  144. IF NOT EXISTS doc/$makecdlang/$makecdregfilename
  145.   SET makecdlang english
  146.   SET makecdregfilename "Registrationform"
  147. ENDIF
  148.  
  149. IF NOT EXISTS doc/$makecdlang/$makecdregfilename
  150.   SET makecdlang deutsch
  151.   SET makecdregfilename "Registrierformular"
  152. ENDIF
  153.  
  154. IF EXISTS doc/$makecdlang/$makecdregfilename
  155.   Copy doc/$makecdlang/$makecdregfilename T:Registrationform
  156.   Protect T:Registrationform rwd
  157.   IF EXISTS ENV:EDITOR
  158.     $EDITOR T:Registrationform
  159.   ELSE
  160.     Ed T:Registrationform
  161.   ENDIF
  162. ELSE
  163.   IF EXISTS C:RequestChoice
  164.     RequestChoice >NIL: "$makecdregreq" "$makecdnoregform" "$makecdansok"
  165.   ELSE
  166.     Echo >CON:0/0/640/100/Error "$makecdnoregform"
  167.   ENDIF
  168.   SKIP unsetvars
  169. ENDIF
  170.  
  171. IF EXISTS C:RequestChoice
  172.   RequestChoice >ENV:makecdANSWER "$makecdregreq" "$makecdshallprint" "$makecdansyes" "$makecdansno"
  173.   IF $makecdANSWER EQ 1
  174.     Type T:Registrationform TO PRT:
  175.   ENDIF
  176.   RequestChoice >ENV:makecdANSWER "$makecdregreq" "$makecdshalldelete" "$makecdansyes" "$makecdansno"
  177.   IF $makecdANSWER EQ 1
  178.     Delete QUIET T:Registrationform
  179.   ENDIF
  180.   Delete QUIET ENV:makecdANSWER
  181. ENDIF
  182.  
  183. LAB unsetvars
  184.  
  185. UNSET makecdlang
  186. UNSET makecdregfilename
  187. UNSET makecdnoregform
  188. UNSET makecdregreq
  189. UNSET makecdshallprint
  190. UNSET makecdshalldelete
  191. UNSET makecdansok
  192. UNSET makecdansyes
  193. UNSET makecdansno
  194.  
  195. LAB end
  196.